object JPGQuality: TJPGQuality Left = 447 Top = 478 AutoScroll = False BorderIcons = [biMinimize, biMaximize] Caption = 'JPEG parameters' ClientHeight = 105 ClientWidth = 319 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poOwnerFormCenter Scaled = False PixelsPerInch = 96 TextHeight = 13 object TeLabel1: TTeLabel Left = 8 Top = 8 Width = 102 Height = 13 Performance = kspNoBuffer Caption = 'Choose JPEG quality:' Color = clBtnFace ParentColor = False ThemeObject = 'default' end object TeLabel2: TTeLabel Left = 136 Top = 34 Width = 34 Height = 13 Performance = kspNoBuffer Caption = 'Lowest' Color = clBtnFace ParentColor = False ThemeObject = 'default' end object TeLabel3: TTeLabel Left = 288 Top = 34 Width = 25 Height = 13 Performance = kspNoBuffer Anchors = [akTop, akRight] Caption = 'Best' Color = clBtnFace ParentColor = False ThemeObject = 'default' end object QualityBar: TTeTrackBar Left = 136 Top = 0 Width = 177 Height = 33 Performance = kspNoBuffer Max = 100 Min = 1 Orientation = ktoHorizontal Position = 100 Frequency = 5 TabOrder = 0 Transparent = True ThemeObject = 'default' end object TeButton1: TTeButton Left = 72 Top = 72 Width = 75 Height = 25 Performance = kspNoBuffer OnClick = TeButton1Click BlackAndWhiteGlyph = False Caption = 'OK' FontOptions.Bold = False FontOptions.Italic = False FontOptions.SizeDelta = 0 FontOptions.FontColor = clNone FontOptions.StrikeOut = False FontOptions.Underline = False ThemeObject = 'default' TabOrder = 1 WordWrap = False end object CancelButton: TTeButton Left = 152 Top = 72 Width = 75 Height = 25 Performance = kspNoBuffer OnClick = CancelButtonClick BlackAndWhiteGlyph = False Caption = 'Cancel' FontOptions.Bold = False FontOptions.Italic = False FontOptions.SizeDelta = 0 FontOptions.FontColor = clNone FontOptions.StrikeOut = False FontOptions.Underline = False ThemeObject = 'default' TabOrder = 2 WordWrap = False end object chkPreserveEXIF: TTeCheckBox Left = 8 Top = 48 Width = 273 Height = 20 Performance = kspNoBuffer Visible = False Caption = 'Preserve EXIF information' AllowGrayed = False Alignment = kalLeftJustify Checked = True Spacing = 5 State = kcbsChecked ThemeObject = 'default' TabOrder = 3 Transparent = True WordWrap = False end object TeForm1: TTeForm Animation.EffectKind = '[ RANDOM ] - Random selection' BorderIcons = [] BorderStyle = kbsStandard Dragging.Sizeable = False SystemMenuOptions.Animation.EffectKind = '[ RANDOM ] - Random selection' TrayMenuOptions.Animation.EffectKind = '[ RANDOM ] - Random selection' MinimizeApplication = False Performance = ksfpNoBuffer StayOnTop = False StretchBackground = False WindowState = kwsNormal ThemeObject = 'default' Left = 360 Top = 88 end object smlFormLangRes1: TsmlFormLangRes LangFileName = 'DefLang.ini' IgnoreEmptyString = False AutoCreateMode = True AddBracket = False StringProperties.Strings = ( 'Caption') StringsProperties.Strings = ( 'Tabs' 'Items') IgnoreFormCaption = False IncludeListViewItems = False IncludeListViewHead = False IncludeTreeViewItems = False Active = True Left = 288 Top = 72 end end